home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / languages / pcq_incl3v1.lha / Resources / CIA.i < prev    next >
Encoding:
Text File  |  1994-09-23  |  596 b   |  28 lines
  1. {
  2.         CIA.i for PCQ Pascal
  3. }
  4.  
  5. {$I "Include:Exec/Interrupts.i"}
  6. {$I "Include:Exec/Libraries.i"}
  7.  
  8. Const
  9.  
  10.     CIAANAME    = "ciaa.resource";
  11.     CIABNAME    = "ciab.resource";
  12.  
  13. FUNCTION AddICRVector(Resource : LibraryPtr; iCRBit : Integer; 
  14.                       int : InterruptPtr) : InterruptPtr;
  15.     External;
  16.  
  17. PROCEDURE RemICRVector(Resource : LibraryPtr; iCRBit : Integer;
  18.                        int : InterruptPtr);
  19.     External;
  20.  
  21. FUNCTION AbleICR(Resource : LibraryPtr; mask : Integer) : WORD;
  22.     External;
  23.  
  24. FUNCTION SetICR(Resource : LibraryPtr; mask : Integer) : WORD;
  25.     External;
  26.  
  27.  
  28.